home *** CD-ROM | disk | FTP | other *** search
/ ETO Development Tools 2 / ETO Development Tools 2.iso / Tools - Objects / MacApp / MacApp CD Release / MacApp 2.0.1 (Many Libraries) / Libraries / PrivateInterfaces / UMacApp.p < prev    next >
Encoding:
Text File  |  1990-10-25  |  1.7 KB  |  61 lines  |  [TEXT/MPS ]
  1. {[a-,body+,h-,o=100,r+,rec+,t=4,u+,#+,j=20/57/1$,n+]}
  2. { UMacApp.p }
  3. { Copyright © 1984-1990  Apple Computer, Inc.  All rights reserved. }
  4.  
  5. {$IFC UNDEFINED UsingIncludes}
  6. {$SETC UsingIncludes := FALSE}
  7. {$ENDC}
  8.  
  9. UNIT UMacApp;
  10.  
  11.     INTERFACE
  12.  
  13.         USES
  14. {$SETC __UMacApp__ := TRUE}
  15.             { • MacApp }
  16.             {$U $$Shell(MAPInterfaces)UMacAppUtilities} UMacAppUtilities,
  17.             {$U $$Shell(MAPInterfaces)UViewCoords} UViewCoords,
  18.             {$U $$Shell(MAPInterfaces)UFailure} UFailure,
  19.             {$U $$Shell(MAPInterfaces)UPatch} UPatch,
  20.             {$U $$Shell(MAPInterfaces)UMemory} UMemory,
  21.             {$U $$Shell(MAPInterfaces)UMenuSetup} UMenuSetup,
  22.             {$U $$Shell(MAPInterfaces)UObject} UObject,
  23.             {$U $$Shell(MAPInterfaces)UList} UList,
  24.             {$U $$Shell(MAPInterfaces)UAssociation} UAssociation,
  25.  
  26.             { • Implementation use }
  27.             {$U $$Shell(MAPInterfaces)UBusyCursor} UBusyCursor,
  28.             {$U $$Shell(MAPInterfaces)ULoMem} ULoMem,
  29.             {$U $$Shell(MAPInterfaces)UDebug} UDebug,
  30.             {$IFC qInspector}
  31.             {$U $$Shell(MAPInterfaces)UInspector} UInspector,
  32.             {$ENDC}
  33.  
  34.             ToolUtils, Resources, Fonts, Desk, FixMath, Controls,
  35.             Windows, Dialogs, Packages, Script, Traps, OSEvents, Devices
  36.             , DiskInit, Errors, PasLibIntf;
  37.  
  38. {$SETC __UMacApp__ := FALSE}
  39.             { • Include the public interface }
  40.             {$SETC _UMacAppIncludes := UsingIncludes}
  41.             {$SETC UsingIncludes := TRUE}
  42.             {$I+}
  43.             {$I $$Shell(MAPInterfaces)UMacApp.p}
  44.             {$SETC UsingIncludes := _UMacAppIncludes}
  45.  
  46.     IMPLEMENTATION
  47.  
  48.         {$I UMacApp.Globals.p}
  49.         {$I UMacApp.TEvtHandler.p}
  50.         {$I UMacApp.TApplication.p}
  51.         {$I UMacApp.TDocument.p}
  52.         {$I UMacApp.TView.p}
  53.         {$I UMacApp.TWindow.p}
  54.         {$I UMacApp.TScroller.p}
  55.         {$I UMacApp.TCommand.p}
  56.         {$I UMacApp.TControls.p}
  57.         {$I UMacApp.TDeskScrapView.p}
  58.         {$I UMacApp.TPrintHandler.p}
  59.  
  60. END.
  61.